Labels:black | darkness OCR: Var X Real; { X is real variable } Procedure New Declaration Var X : Integer; { Redeclare X as integer} begin // X = 1.234; {would give an error when trying to compile} X = 10; { Correct assigment} -end; { From here on, X is Real again} begin X = 2.468; end.